@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} |||DDOS DOSDOS SYS }}}@}M}D}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D,}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F-}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟.}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED035 FREE SECTORS COPYING---D2:PACM4}AN2.OBJ# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 2.?}D2:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rG}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uEiͩkΩ͙kCop j`j {j`Hi͝Νh`V}L"UNEM:D" NURͩkΩ͙kCop j`j {j`Hi͝Νh`FILE@AASUBMITTED TO MACE BY MIKE KOLLMORGAN. +@ X}1@@@>;@0,J6-@o0@H:,$@v(}( Šˠ  @ Y}s(( ŠԠҠנˠ06.DB67@,.=:,V67@,.:*.*s@@ Z}@( @*@@'@@8*() )(INPUT CHOICE.. ie= D:FILENAME( 4 [}NEXT%%D2:MENU@AASUBMITTED TO MACE BY MIKE KOLLMORGAN. +@ YZjyMXTT2TLQQLGTEMPNANQFILEQANZTTLQAWINLOSEWLWILOSSEBYDZTOT]}@@ ^} !_}n6-Askk;$@%,;@0,9,;$@0,9,;@ ,;@0,;@%,;@1,;@,u`}11;@0,;@,;@,;@ ,x56.Good, I guessed it!)6-56-c#@@a}K:-+?@@dQB7t@dcA@!-@!(l-@@"b}>($ҠӠӠɠӠP-@ @#l(̠Ġ 6. D:ANIMAL.DAT c} AS @@/@<@SB:, @A4 7@<@,4Sd}CORE* A4 A@ A@-5@)67$@%%e}@,.568,-B:,B:, @A 0"7@<@,4IS IT A06-%@5@)67$@0f}%@,.568,-B:,B:, @A00"7@<@,4IS IT A06-%@ @8-@g}@2( WELCOME TO ANIMAL5(8(..( To date I have  games1.( But I have only h}  games1(](-(" 렠0(3(]( I currently know  animals-@i}A C +@@d1B7t@dCA@-@@">($ҠӠj}ӠɠӠP-@ @#l(̠Ġ~-@( (Think of an animal ak}nd I(will try to guess it.,6 6.@- Ap JC-%@C7$@%%@<$l}@%%8,,4APT  AP^ 6-6- h Ap A0mr**(7$@0%@<$@0%8m},,| A67B:,%@,.>:,$-"@:Y,((#6-%@- A(I GIVE UP, n}WHAT IS ITCB:,!@%)(** TOO LONG **9( WHAT IS ITC A 4( ApE(.6.7$@0o}%@<$@0%8,,76-8,E6-%@((( What would be a good question to""(tell that from 7@,p} /B:,!@0%(** TOO LONG **/ A   4( A '7B:,,0?'67B:,%@,.?/Bq}:,!@0%(** TOO LONG **/ A &&(What would be the right answer&(for ?0 A:@:Y,*r}@:N,A`N-6-%@-6.7@:,`68,-B:,%@E+67$@0%@<$@0%B:,,.768,-B:,E6-%@u}L+67$@%%@<$@%%B:,,.L67$@%%B:,%@,.>:,68,-B:,%@p#67$@0%@v},.IS IT <67$@0%@,.\67$@0%B:,%@,.?p68,-B:,%@(%%(Would you like to tryw} again? A"@:N,Ap"@:Y,AP A  A0 4 @x}@* A4 A%*(@(@4->22(@7$@%%@<$y}@%%8,,H22(@7$@0%@<$@0%8,,R @W B\RUN "D:MAINMENU"]z}.AR@( .B2y*)@!@*6-&@2@:Y,*@:N,A{}"@:N,A@m-@@#(7-@@; G(YES[-@@_ c m AP|}_-@@!(5-@@9 C(NOW-@@[ _ AR($}}O/P Score Ctl Record 6.=:,6.=:,[ @767@<@,.7@<@,Q67@<@~},.00[ A@x A767@<@,.7@<@,_67@<@,.7@<@,x67@}<@,.0[ @767@<@,.7@<@,Q67@<@,.00[ A`x A767}@<@,.7@<@,_67@<@,.7@<@,x67@<@,.0(@SCORE } $16.7@<@ ,16.7@<@, 6-A:,6-A:,($2 % D:ANIMDAT.STA }D2:ANIMAL.CWGMXTT2TLQQLGTEMPNANQFILEQANZTTLQAWINLOSEWLWILOSSEBYDZTOT210SDOES IT HAVE FOUR FEET?SIS IT DOMESTIC?SDOES IT EAT MEAT?NNNIS IT A WORM?NNYIS IT AN EAGLE?NYNIS IT A CHICKE}N?NYYIS IT A MAN?YNNIS IT AN ELEPHANT?YNYIS IT A WOLF?YYNIS IT A COW?YYYIS IT A DOG?T AN EAGLE?NYNIS IT A CHICKE_ 11NQTdn36-@6-@3;@0,;@,x--}@@ D:ANIMAL.DAT(@(@- "67B:,%@,.?(}@(@ @S,DOES IT HAVE FOUR FEETS,IS IT DOMESTICS,DOES IT EAT MEAT}NNN,IS IT A WORMNNY,IS IT AN EAGLENYN,IS IT A CHICKENNYY,IS IT A MANYNN,IS IT AN ELEPHANTYNY,I}S IT A WOLFYYN,IS IT A COWYYY,IS IT A DOG D:ANIMDAT.STA-@6-@3;@0,;@,x--K A  ANIMAL was provided by the$$GREATER DES MOINES ATARI USERSGROUP of DES MOINES IOWA.}( Minor changes were made by2Charles Godfrey of MACE.<Z (}@d%"( WELCOME TO ANI}MAL %(h((( The files used in this game are:n$$(ANIMAL The main Programx$$(ANIMAL.DAT The Data File }((( ANIMAL.STA Initialize Data File(%%(The tag MXA in the first line%%(indicates the maximun number %%(}of animals. If you have less''(than 48K you may want to reduce( this number.(**("Generally all questions ar}e of the//('Yes/No variety. Simply push either the//(''Y' or the 'N' key. Pushing the RETURN (key in not nece}ssary. (-@A  ++(#When giving an animal as an answer,//('answer like: A Dog, A Cat, or An Eagle}.(Not just DOG or CAT.--(%Otherwise the grammar of the computer(will not be correct.--(%The maximum len}gth of your answers is(25 characters. D:ANIMAL.INSTER DES MOINES ATARI USERSGROUP of DES MOINES IOWA.A!"7JXCNSISTZZZF @@@3A(@ } A@ Ae @ @@!@@A@AY@@8d;@,n6-@ }x[ +@'0@@A0@@@[0@ A0@@ }@)6-@56-@tA6-@M6-Y6-e6-o A@{6- A06- }6-A%$@P6-A%$@@ A`6-@ T:,A)6-%@"@ }!)6-@96-A%$@P/6-A%$@@9 A`&6-R:,&"@AP#"@ } Ap# A NR:,"@$6-@>0@A(D(N APa%2@@5@ }@36-&@?"a2@ A` A T:,"(7( }*** MISSION ABORTED ***Y2@{2@ A "@A }6-&@** ADJ FOR THRUSTL6-R:,@@2@AP@@L6-@gg& }@AAAA A0A@APA`ApAA")6-%@6-%@ }) A,)6-&@6-%@) A66-%@ A@&J)6-%@6-&@) A }T)6-&@6-&@) A^6-&@ Ah&r6-%@ A|6-&@6 }-&@'!*"@',%@ A ** MOVE @ 6-%@ Ap)6 }-P:$? ,%)6-P:$?@,% A0 A`"$D-&@%@+1%@7"@ }:'D A0 ;#-&@%@@;-&@%@' 1"@''' A0 }  $C%2@C A')!A2AP@A&m-@@ }10@@@E-@@Pi2@A%@@m 0[0@?2@ }S-@@0W [ :% Ap(%(*** CRASH!!! ***D A N0(0(%*** CONGRATU }LATIONS! PERFECT LANDING!X-@@ 10@@@S2@@5@@g-@@ }k 0@@ @2@b-@@  lb+(#FRWRD=NEW MISSION,B }KWRD=NEW TERRAINb(FUEL=,TIME=,VERT=$6@,HRZTL=v&6-R:,&"@A0! Ap! }"@A@"@A  A0** ERASE SHIP"$ ,&@%@ }//&@&@E,&@%@[/&@&@i,%@w/&@,%@%@/% }@&@2,%@%@//%@&@2$ ** DRAW SHIP4 A`"- }-@A1 4$ @,&@/%@5,&@&@K/&@%@a,%@ }&@w/%@%@,&@&@/&@%@/,%@&@//%@%@  }$** DRAW TERRAIN k @/6-P:@ $H:,,%@A,@yS/@ @y_6-@ k6- }@y*CCP:@$H:,,%@A A A0A@46-&@ AP>)6-%@6-& }@) APH6-%@R ,P:,A\ ** DOWNfCCP:@$H:,,%@AA }A A p6-%@ A z)6-%@6-%@) A 6-%@ ,!!A * }@yAp' ,/A@!6-A@'6-+,A%&@+,A5&@** UP AGAINCCP:@ }$H:,,%@A pA pA A 6-&@ A)6-%@6-&@) A }6-%@' ,'AY*A `'6-@ $T:,"@'$,6-@6-%@ })"A`,$56-&@1%@+,5 A0R:,@$ A $** PRINT STA }TS. (] ( "@A833( THRUST:VERT=$6@HRZNTL= BCC( BEARING:VERT=+&,$6@H }RZNTL=+&A0,$6@L..(LEVEL= FUEL= TIME= Ve( *** OUT OF FUEL ***46-@ }@6-b2@e$`e( *** OUT OF TIME ***46-@@6-b2@ }e$j$t** TOUCH UP TERRIAN~L @,@y1/@ @y=,A I/A@ }L$** CK FOR OFF SCREEN6-@/# @) @)!AV/6-!@uAP$ }(TONE,DIST,VOLUME 2@  ALUNAR LANDER1. The object of the }game is to pilot the lunar!!lander to the other side ofthe mountain and land(slowly between the hash2 }marks without crashing. <!!2. All controls are throughFthe #1 control stick. P3. On the launching pad,Z!!the } stick controls have thedfollowing functions: nFoward =Launch x!!Backward =Redraw terrain. If trigger }is held while the terrian is being drawn then the terrian will fill in. Right =Blank out fl }ight stats. Trigger =Set level of play(1-20). 1 is the hardest. 4. In flight, the stick!!contro }ls have the followingfunctions: Stick =Ship moves in the direction of the  stick.  Trigger }=abort mission. "Move stick foward to ,set ship on launching 6 pad. D2:LUNARLDR e`aACHSESCBALLBALLMPRACTICPOINDEBPOBPOSWHICWHICHBDIBDIRBIBINPBSCORBPEEKPBHBdd$}@D  @@ A  A  A A2A $}@@ @AdҠɠΛn +@$}xy A`+@+AV'AVE0@@@_0@@@y0@@$}%%6-F:@,%AV$F:@,&-@@&(@ !(-@@((@< >&-@$}@&(@ '-@@ '(@ $ %E6-@;@,&6.GG8-@E($}@5 A -@@5(@:W-@@+(@ /A-@@$}W(@&6-F:B2y,&"@AF:B2y,"A "@6-@&"$}@6-@&@A,-@@,(@  AΠР" $}A  A , A@ A 6 A@ŠӠJF:B2y,"@%T996-@&+@&S:$},,%+@&S:@,,^ApAAh$r<-@@*(@<> <@w$}|)-@@ &(@$ +)$*-@@*(@ <> )-@@ &(@$ %)$$}<-@@*(@ <><@w)-@@ &(@+ %)$Š̠!!6-$}+%@,$+ &@, 6-8, 6-8,6-8,6-8,6-%8<,$@:7%@,,$}. 6-%.")!8<,A0 68,- 68,-$ĠƠ...Ŀ26-F:%@ ,2$}@(*@0A&\ -@6@<2@P@X2@@`@\ 0]($}*6-%@%@ $+"@,L-@&B:=:,,'@@](@ :)68,-68,& A`$})$Dk%2A@@9-@@P= _2kApN--@$}@--&@X8,@:7%@,,bF68,-8,%@ &8,>2$%@@&B F $}l$-@ @$(@v.-@.(@ press  F:B2y,@A@%$}Π +@;@,6.JgErG-@B:, 6-@:7,,GAP:'@,$@%$}@-@@!@29,%&@&@=E,%k2%$@@@o y@2$},%&@&@ -@@6@*@2J,%'@%@P%@Nf,%@%'@$}2%$@@@  1-A@@1A]6-F:A,'A$}F:A ,<A F:A,QAF:A,]A*AF:B7p,*B2yG2$}@@C2@%@@@G G%2G2@$} , +@-@@,(@J$6-+F:A,&@,$AV8-@F%J  ,$} #A@,F:%@,"@`A0*V-A(A*%F:BsD%,F2@@RB2tV $}4-@@"1-@X%$@%F:BsD%$@%,t2@@2@$}@@>[B2t  92[2@Haa34,34,33$},97,44,108,51,115,26,26,42,42,53,117,39,103,37,101,50,114,48,48,35,99,52,116,41,105R@""6@62$}@ A0\Y-@"-%$@%I2@@UB2tY f AP$}p%%1,60,126,219,255,189,195,126,60z&&2,24,102,165,219,231,126,122,126%%3,0,126,126,126,126,231,195,1954,3,6,12$},24,16,112,0,05,192,96,48,24,8,14,0,0$$6,60,90,219,255,231,231,126,607,0,0,0,24,24,0,0,08,0,0,0,0,63,22$}4,0,09,0,0,0,0,252,7,0,010,1,67,166,28,0,0,0,011,128,194,101,56,0,0,0,028,128,130,68,60,7,0,0,0$}30,1,33,18,60,224,0,0,0!!127,16,24,28,30,30,28,24,16-1ŠΠRead in parabolas"9@$}<@,"#A`$,,0,-19,-20,-21,-21,-1,19,19,20,20,0,-99.//0,-20,-21,-21,-21,-1,-1,19,20,21,21,0,-998//0,-19$},-20,-21,-21,-1,-1,19,19,20,21,0,-99B,,0,-19,-20,-20,-21,-1,19,19,19,20,0,-99L""0,-20,-21,-21,19,19,20,0,-99V-$}@`-@@j#"6@68<,-# t68<,-&@~ &&9@,9$}@,9@,9@,9@,$Šӛ+-@'68,-6@+ -$}&@0068,-6@%@$+H:@,!?P, 6- A` $ŠŠ̠-$}6-P:@$H:,,-68,-6@BB68,-%A0%P:@$H:,,&@$+8,"6@,-&$}@  8,"6-  A` 68,-9968,-@%+8<,&@,$+8,"6@,($ $}D2:JUGGLERCHSESCBALLBALLMPRACTICPOINDEBPOBPOSWHICWHICHBDIBDIRBIBINPBSCORBPEEKPBHBdd$ 56XSTPOLYFICOLNXYYQQYMAYMIYNOIIXXA A A Bp@(}@e@pA N  @ A @ @@@Y@@@A3PA7fffd##=(}============================i##= POLYFIL Subroutine =n##= Demonstration Program =x##=====================(}========}##= by: =##= Phil Dunn =##= 12 Monroe Ave. =##= Hi(}cksville, NY 11801 =##============================= +@#$A@P$C.1 = MAROON#A (}A#C.2 = GREEN*A@*C.3 = WHITE, WINDO*AAF*C.0 = BLUE, BACKG.119@,(}9@,9@,9@,6-Bp1!!Read areas and fill them in;33First read the color & no. of po(}ints.@ "B"6@AE==Now read in all the vertex point coordinatesJ-@T "(}^ 68,-h 68,-r wNow set the color|//Now let the subroutine fill it in.  A (}##=============================##= Scene from the book =##= "Stranger By The River" =##= by Pa(}ul Twitchell =##=============================MOUNTAIN//2,6,54,42,68,30,85,22,110,35,118,45,54,45MOUNT(}AIN TOP--3,6,85,22,98,29,95,30,88,32,78,29,74,27LOWLANDS''2,5,0,44,80,40,159,44,159,45,0,45FOREGROUND!(}!2,4,0,65,159,65,159,96,0,96 RIVER&UU3,12,0,44,159,44,159,66,140,68,125,70,105,74,80,77,60,78,47,78,40,77,25,75,0,69(}vLEFT TREE TOPPP2,12,25,25,37,34,32,35,36,40,30,43,33,55,18,59,5,50,12,41,8,37,15,32,12,30RIGHT TREE TOPAA(}2,8,130,32,149,39,145,48,153,56,135,68,116,61,120,53,115,47LEFT TREE TRUNK--1,6,11,80,16,56,19,52,21,57,17,81,14,83(}RIGHT TREE TRUNK331,6,131,83,130,65,133,59,136,65,141,82,136,85 -1,-1  Paul% @*6-@U4(}6-@9/,&@%@//&@%@> ,/%@C/,%@%@//%@%@)}H/,%@%@//%@%@R/,%@%@//%@%@W/,%@%@/)}/%@%@\/,%@%@//%@%@a,%@%@f',%@',%@%)}@p/,%@%@/,%@%@ Rebezar @6-@e6-@p/,&@)}%@//&@%@ ,/%@',%@'/%@%@/,%@%@//%@)}%@/,%@%@//%@%@/,&@%@//&@%@/,&@)}%@//%@%@,%@%@AY@4 A 6-@>!!==============)}=============>!!=A Polygon Fill Subroutine=>!!= by Phil Dunn =>!!===========================>Enter w)}ith the values...> NP = No. of vertex points.>X = DIM array of x values>Y = DIM array of y values>S = DIM )}array used here>T = DIM array used here>Uses variables...>Q1,Q2,I,J,YMAX,YMIN,YNOW>IM,IP,XA,XBhB6-@) }iB6-AkB -lB 6-%mB !6-rB"8,"8,68,-" Bp0|B""68,-+8,&8,,'+8,&8,,) }}B68,-8,&8,$8,B B 6-6B 6-B -B  8,6-8,B !8,6-8,6-B B 6-) }B 6-&B  6-B 6-%B !6-B Bq0B 8,"6-8, BqB6-+&8,,'8,B 8) },"6-8, Bq B6-+&8,,'8,B ,/B 6-%B 8,Bq`B 8,"$B 6-B 6-%) }C !6-C 8,BpC 8,"$C 6-&C  6-&C BpD2:POLYGON.FIL@(p !Z PANTHER.BAS;@,((DISPLAY OR?(D/P): 2 4D+@-} @<@ 4P@6@@P:@ @F @@P6-@Z(@d(@-} n(@x//(@ ...AA(@/ /''''. -} /'''.CC(@1 : :'':/ % /''.'.CC(@1 MMMM; -}; ' / / / : :CC(@1 WWWW:-:##MMMM--'''--// ,-' ;BB(@0 -} /' : 'WMMM ::.' .-''??(@- ; .MM /.-- ....WMM' .-'??(@- -} ...---WW'' / / 'M' ':@@(@. ...--'' ..-' : MM : ':@@(@. /''M-}MMMM. .'' . MM % :@@(@. -.-''#-. 'MMMMMMM.-. /'??(@- -,--#---} 'WMMW'' '. .'==(@+ ....,-- # -... .'<<(@* : .-}-' '. '-.:*-'''-- .'''--'%'33(@! &. '. .-' '-. #-.#-.44(@" ''' -} / #.=-.66(@$ ./ .-' '."66(@$ .='' '-='' :,66(-}@$ / ' :677(@% : : :@77(@% -} ; .% :J77(@% : -. : :T77(@% :' -} ./ : :^77(@% : -. ; :h66(@$ :' ./ / -} /r66(@$ : =. : :|77(@% : / : .:.99(@-}' / .: .-'' '.::(@( : ::. .-' &;;(@) -} / :'%=-....-' . :;;(@) : : '-. .-'-. . : :;;(@) /-} '''''-. '-...''. :) )::(@( : .-'''-. .'.)='77(@% :....='! - } '-. .' :77(@% : : : ''' :77(@% '.'.'. -!}:77(@% -'-: ;66(@$ & /66(@-"}$ & :66(@$ & :::(@( -#} ! +....==(@+ '; '-.??(@- -$} '. ''''-. '.&AA(@/ '- . .: '. '.0BB(@0 -%} : '. ./ '. '.:CC(@1 & : : '. '.DDD(@2 -&} : : ; '. '.NEE(@3 : : / '. '.XGG(@-'}5 : : : '. '.bHH(@6 : : : '.-(} '.lHH(@6 : : : ' 'vII(@7 : : -)} : ' 'LL(@: : : : '. ''-MM(@; -*} : : : '. |LL(@: : : : -+}'-44(@" : / :44(@" : : :44(@" -,} : : :44(@" : : :44(@" --} : : :44(@" : : :44(@" ; : :44(@-.}" / : :55(@# .' : '.88(@& -/} .' : '-.<<(@* .' : ''-. ??(@- .' -0} ! '-.AA(@/ ;' ' ' -. '. BB(@0 .' '-1} ' .' '. . '.;*AA(@/ : .' .' .' '. '...)4??(@- -2} '-. : .-' '-......).>''(@ ',-'--'H(@R(@\@%D:MEN-3}UfD2:PANTHER.PTR PANTHER.BAS;@,((DISPLAY OR?(D/P): 2 4D+@,kl'8CODEBYTEAHALDBYTLHHITMISSESPACBASPPCCLOOTOTTYYXXWAICLEAIMAGLINBLASES15}AT@VAy?QFAq@W @H @ @ A6 A6BX@B`16}A3A@@DA g&ArQCCA6AD@@ AA%Ba17}$ !@"#$%@&@dSAUCER LAUNCHnby MIKE DOUGHERTYxfrom MICRO 6502 11/18}81DONATED BY BRUCE MCLENDONEEmod.for number of saucers and to end.B2y@ F:B2y,"1f}@A T:,A7$(#:( (:(+'$A,'@% - MISSION WELL DONE!<#-@1g}@F#33-H:@,$A%A@6@P#C2@@;0@@'@ ? C1q}B'DOS SYSB*+DUP SYSBUAUTORUN SYSBWMENU B'\ANIMAL BANIMAL DATBANIMDAT STAB ANIMAL INSB0LUNARLDR B,JUGGLER BPOLYGON FILB&PANTHER PTRB<4LAUNCH BGySPACECDT B2STELLAR BSPIDER BDYAHTZEE x#A%2/+AAR@# ( (Press BUTTON to go on#((Hit